Namespace My

  ' The following events are availble for MyApplication:
  ' 
  ' Startup: Raised when the application starts, before the startup form is created.
  ' Shutdown: Raised after all application forms are closed.  This event is not raised if the application terminates abnormally.
  ' UnhandledException: Raised if the application encounters an unhandled exception.
  ' StartupNextInstance: Raised when launching a single-instance application and the application is already active. 
  ' NetworkAvailabilityChanged: Raised when the network connection is connected or disconnected.
  Partial Friend Class MyApplication
    'Author: Faisal Saleem
    'Date Created(DD-MMM-YY): 18-Jul-10
    '***** Modification History *****
    '                 Date      Description
    'Name          (DD-MMM-YY) 
    '--------------------------------------------------------------------------------
    '
    ''' <summary>
    ''' This event will hold the value that application is started.
    ''' </summary>
    Private Sub MyApplication_Startup(ByVal sender As Object, ByVal e As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) Handles Me.Startup
      Try
        QuickLibrary.Common.IsApplicationRunning = True

      Catch ex As Exception
        Dim _qex As New QuickExceptionAdvanced("Exception in MyApplication_Startup event method of ApplicationEvents.", ex)
        _qex.Show(General.LoginInfoObject)
      End Try

    End Sub
  End Class

End Namespace

